home *** CD-ROM | disk | FTP | other *** search
- ;Dieses Skript kopiert den Compiler auf eine Diskette
- ;mit dem Namen »PAS«
-
- FAILAT 21
-
- RESIDENT C:COPY
- RESIDENT C:ECHO
- RESIDENT C:MAKEDIR
-
- ASSIGN >NIL: pas: exists
- IF WARN
- ECHO "Bitte legen Sie eine Diskette mit dem Namen »PAS« ein:!"
- QUIT 5
- ENDIF
-
- ECHO "Kopiere den Compiler..." NOLINE
- COPY >NIL: Ober.info pas:
- COPY >NIL: Help.info pas:
- COPY >NIL: Floppy-Start.info pas:
- COPY >NIL: Icon.info pas:
- COPY >NIL: Demo.info pas:
- COPY >NIL: CliComp pas:
- COPY >NIL: Fehler.Msg pas:
- COPY >NIL: Floppy-Start pas:
- COPY >NIL: Help pas:
- COPY >NIL: Make pas:
- COPY >NIL: NoPrj? pas:
- COPY >NIL: Ober pas:
- COPY >NIL: ScLib pas:
-
- ECHO "OK!*NKopiere die Compiler-Libraries..." NOLINE
- MAKEDIR >NIL: pas:asm
- COPY >NIL: asm/#? pas:asm/
-
- ECHO "OK!*NKopiere wichtige Objekt-Module..." NOLINE
- MAKEDIR >NIL: pas:code
- COPY >NIL: code/#? pas:code/
-
- ECHO "OK!*NKopiere Beispielprogramme..." NOLINE
- MAKEDIR >NIL: pas:demo
- COPY >NIL: demo/#? pas:demo/
-
- ECHO "OK!*NKopiere die Dateien der Online-Hilfe..." NOLINE
- MAKEDIR >NIL: pas:Hilfe
- COPY >NIL: Hilfe/#? pas:Hilfe/
-
- ECHO "OK!*NKopiere die Fehlermeldungen..." NOLINE
- MAKEDIR >NIL: pas:t
- COPY >NIL: t/#? pas:t/
-
- copy >NIL: c:BLink NIL:
- IF WARN
- ECHO "OK!*NKopiere den Linker ins C-Verzeichnis..." NOLINE
- COPY >NIL: c/BLink c:
- ENDIF
-
- ECHO "OK!*NKopiere die Fonts..." NOLINE
- COPY >NIL: fonts fonts: all
-
- ECHO "Der Compiler ist nun auf der Diskette zu finden!"
- ECHO "Vergessen Sie nicht, vor dem Arbeiten das Programm"
- ECHO "»Floppy-Start« zu starten."
-
- ASK "Bitte <Return> drücken, um fortzufahren"
-